home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 26 / CU Amiga Magazine's Super CD-ROM 26 (1998)(EMAP Images)(GB)[!][issue 1998-09].iso / CUCD / Utilities / AmiSPICEed / Install_AmiSPICEed < prev    next >
Text File  |  1998-04-28  |  5KB  |  128 lines

  1. ;
  2. ; Installer script for AmiSPICEed
  3. ; $VER: Install_AmiSPICEed 1.2
  4. ;
  5.  
  6. ;*** set strings ***
  7. (set #os-to-old "Your Amiga-OS is to old, sorry...")
  8. (set #select-dir "Select a directory for AmiSPICEed.\nA new directory named >AmiSPICEed< will be created there!")
  9. (set #prog-choice "Which program version?")
  10. (set #language-choice "Choose your language")
  11. (set #select-spice "Executable file of SPICE")
  12.  
  13. (if (= @language "deutsch")
  14.   (
  15.   (set #os-to-old "Dein Amiga-OS ist leider zu alt...")
  16.   (set #select-dir "Wähle ein Verzeichnis für AmiSPICEed aus.\nDort wird ein neues Verzeichnis namens >AmiSPICEed< angelegt!")
  17.   (set #prog-choice "Welche Programmversion?")
  18.   (set #language-choice "Wähle Deine Sprache")
  19.   (set #select-spice "Ausführbare SPICE-Datei")
  20.   ))
  21.  
  22. (if (= @language "español")
  23.   (
  24.   (set #os-to-old "Tu Amiga es demasiado antiguo, lo siento pero...")
  25.   (set #select-dir "Selecciona un directorio para AmiSPICEed.\nUn nuevo directorio llamado >AmiSPICEed< sera creado alli!")
  26.   (set #prog-choice "Que versión del programa?")
  27.   (set #language-choice "Elige tu idioma")
  28.   (set #select-spice "Fichero ejecutable del SPICE")
  29.   ))
  30.  
  31. ;*** get some system info ***
  32. (set vernum (getversion "libs:version.library"))
  33. (set ver (/ vernum 65536))
  34.  
  35. ;*** start ***
  36. (complete 0)
  37. (if (< ver 36) (abort #os-to-old))
  38. (welcome)
  39. (user 3)
  40.  
  41. ;create directory
  42. (set directory (askdir (prompt #select-dir) (help @askdir-help) (default "RAM:") (disk)))
  43. (makedir (tackon directory "AmiSPICEed") (infos))
  44. (set directory (tackon directory "AmiSPICEed"))
  45. (complete 10)
  46.  
  47. ;copy main prog
  48. (set machine (askchoice (choices "AmiSPICEed 68000" "AmiSPICEed 68020+/FPU" "AmiSPICEed 68040/040") (prompt #prog-choice) (help @askchoice-help)))
  49. (if (= machine 0)
  50.   (copyfiles (prompt #copy-main) (source "AmiSPICEed") (dest directory) (infos) (noposition))
  51.   (if (= machine 1)
  52.    (copyfiles (prompt #copy-main-FPU) (source "AmiSPICEed_020FPU") (dest directory) (newname "AmiSPICEed") (infos) (noposition))
  53.    (copyfiles (prompt #copy-main-040) (source "AmiSPICEed_040") (dest directory) (newname "AmiSPICEed") (infos) (noposition))))
  54. (complete 20)
  55.  
  56. ;copy prefs file
  57. (copyfiles (prompt #copy-prefs) (source "AmiSPICEed.prefs") (dest directory))
  58. (complete 30)
  59.  
  60. ;ask for language
  61. (set instlang (askchoice (choices "english" "deutsch" "español" "italiano" "français") (prompt #language-choice) (help @askchoice-help)))
  62.  
  63. ;copy catalog
  64. ;english
  65. (if (= instlang 0)
  66.   (
  67.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  68.   (complete 50)
  69.   ))
  70. ;deutsch
  71. (if (= instlang 1)
  72.   (
  73.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  74.   (complete 40)
  75.   (makedir (tackon directory "Catalogs/deutsch"))
  76.   (copyfiles (prompt #copy-locale) (source "Catalogs/deutsch/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/deutsch")))
  77.   (complete 50)
  78.   ))
  79. ;español
  80. (if (= instlang 2)
  81.   (
  82.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_spanish.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  83.   (complete 40)
  84.   (makedir (tackon directory "Catalogs/español"))
  85.   (copyfiles (prompt #copy-locale) (source "Catalogs/español/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/español")))
  86.   (complete 50)
  87.   ))
  88. ;italiano
  89. (if (= instlang 3)
  90.   (
  91.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  92.   (complete 40)
  93.   (makedir (tackon directory "Catalogs/italiano"))
  94.   (copyfiles (prompt #copy-locale) (source "Catalogs/italiano/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/italiano")))
  95.   (complete 50)
  96.   ))
  97. ;français
  98. (if (= instlang 4)
  99.   (
  100.   (copyfiles (prompt #copy-manual) (source "AmiSPICEed_english.guide") (dest directory) (newname "AmiSPICEed.guide") (infos))
  101.   (complete 40)
  102.   (makedir (tackon directory "Catalogs/français"))
  103.   (copyfiles (prompt #copy-locale) (source "Catalogs/français/AmiSPICEed.catalog") (dest (tackon directory "Catalogs/français")))
  104.   (complete 50)
  105.   ))
  106. ;copy image and History
  107. (copyfiles (prompt #copy-iff) (source "surfing.iff") (dest directory))
  108. (copyfiles (prompt #copy-iff) (source "History") (dest directory) (infos))
  109. ;copy directories
  110. (makedir (tackon directory "circs"))
  111. (copyfiles (prompt #copy-circs) (source "circs") (dest (tackon directory "circs")) (all))
  112. (complete 60)
  113. (makedir (tackon directory "bibs"))
  114. (copyfiles (prompt #copy-bibs) (source "bibs") (dest (tackon directory "bibs")) (all))
  115. (complete 70)
  116. (makedir (tackon directory "spice"))
  117. (copyfiles (prompt #copy-spice) (source "spice") (dest (tackon directory "spice")) (all))
  118. (complete 80)
  119. (makedir (tackon directory "TeX"))
  120. (copyfiles (prompt #copy-TeX) (source "TeX") (dest (tackon directory "TeX")) (all))
  121. (complete 90)
  122.  
  123. ;modify SPICEEXE tooltype
  124. (set #spice (askfile (prompt #select-spice) (help @askfile-help) (default "spice3f5full")))
  125. (tooltype (prompt #change-tooltype) (help @tooltype-help) (dest (tackon directory "AmiSPICEed")) (settooltype "SPICEEXE" #spice))
  126. (complete 100)
  127.  
  128.